EnigmA Amiga Run 1999 March/EnigmA AMIGA RUN 35 (1999)(G.R. Edizioni)(IT)[!][issue 1999-03].iso/earcd/devel/vbcc-68k-src/machines/amiga68k/libsrc/stdio/fgetpos.c

C/C++ Source or Header | 1999-01-01 | 155b | 14 lines

#include <stdio.h>

#undef fgetpos

int fgetpos(FILE *f,fpos_t *ptr)
{
    long l;
    l=ftell(f);
    if(l==-1L) return(1);
    *ptr=l;
    return(1);
}